home *** CD-ROM | disk | FTP | other *** search
/ Time Warp / Time Warp.iso / mac / Time Warp / Time Warp.DXR / Shared_63.ls < prev    next >
Encoding:
Text File  |  1997-05-23  |  716 b   |  37 lines
  1. on JulieMonitor
  2.   global monitor
  3.   if soundBusy(1) then
  4.     sound stop 1
  5.   end if
  6.   puppetSprite(15, 1)
  7.   set the locH of sprite 15 to 75
  8.   set the locV of sprite 15 to 333
  9.   if the movieName contains "LAB" then
  10.     set x to random(2)
  11.     if x = 1 then
  12.       LabMonitor("JMON1.MOV")
  13.     else
  14.       if x = 2 then
  15.         LabMonitor("JMON2.MOV")
  16.       end if
  17.     end if
  18.   else
  19.     set x to random(4)
  20.     if x = 1 then
  21.       LabMonitor("JRET1.MOV")
  22.     else
  23.       if x = 2 then
  24.         LabMonitor("JRET2.MOV")
  25.       else
  26.         if x = 3 then
  27.           LabMonitor("JRET3.MOV")
  28.         else
  29.           if x = 4 then
  30.             LabMonitor("JRET4.MOV")
  31.           end if
  32.         end if
  33.       end if
  34.     end if
  35.   end if
  36. end
  37.